3.6.43 \(\int \frac {(1+x) (1+2 x+x^2)^5}{x^{17}} \, dx\)

Optimal. Leaf size=61 \[ -\frac {(x+1)^{12}}{16 x^{16}}+\frac {(x+1)^{12}}{60 x^{15}}-\frac {(x+1)^{12}}{280 x^{14}}+\frac {(x+1)^{12}}{1820 x^{13}}-\frac {(x+1)^{12}}{21840 x^{12}} \]

________________________________________________________________________________________

Rubi [A]  time = 0.01, antiderivative size = 61, normalized size of antiderivative = 1.00, number of steps used = 6, number of rules used = 3, integrand size = 17, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.176, Rules used = {27, 45, 37} \begin {gather*} -\frac {(x+1)^{12}}{21840 x^{12}}+\frac {(x+1)^{12}}{1820 x^{13}}-\frac {(x+1)^{12}}{280 x^{14}}+\frac {(x+1)^{12}}{60 x^{15}}-\frac {(x+1)^{12}}{16 x^{16}} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[((1 + x)*(1 + 2*x + x^2)^5)/x^17,x]

[Out]

-(1 + x)^12/(16*x^16) + (1 + x)^12/(60*x^15) - (1 + x)^12/(280*x^14) + (1 + x)^12/(1820*x^13) - (1 + x)^12/(21
840*x^12)

Rule 27

Int[(u_.)*((a_) + (b_.)*(x_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Int[u*Cancel[(b/2 + c*x)^(2*p)/c^p], x] /; Fr
eeQ[{a, b, c}, x] && EqQ[b^2 - 4*a*c, 0] && IntegerQ[p]

Rule 37

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[((a + b*x)^(m + 1)*(c + d*x)^(n +
1))/((b*c - a*d)*(m + 1)), x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[b*c - a*d, 0] && EqQ[m + n + 2, 0] && NeQ
[m, -1]

Rule 45

Int[((a_.) + (b_.)*(x_))^(m_)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[((a + b*x)^(m + 1)*(c + d*x)^(n + 1
))/((b*c - a*d)*(m + 1)), x] - Dist[(d*Simplify[m + n + 2])/((b*c - a*d)*(m + 1)), Int[(a + b*x)^Simplify[m +
1]*(c + d*x)^n, x], x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[b*c - a*d, 0] && ILtQ[Simplify[m + n + 2], 0] &&
NeQ[m, -1] &&  !(LtQ[m, -1] && LtQ[n, -1] && (EqQ[a, 0] || (NeQ[c, 0] && LtQ[m - n, 0] && IntegerQ[n]))) && (
SumSimplerQ[m, 1] ||  !SumSimplerQ[n, 1])

Rubi steps

\begin {align*} \int \frac {(1+x) \left (1+2 x+x^2\right )^5}{x^{17}} \, dx &=\int \frac {(1+x)^{11}}{x^{17}} \, dx\\ &=-\frac {(1+x)^{12}}{16 x^{16}}-\frac {1}{4} \int \frac {(1+x)^{11}}{x^{16}} \, dx\\ &=-\frac {(1+x)^{12}}{16 x^{16}}+\frac {(1+x)^{12}}{60 x^{15}}+\frac {1}{20} \int \frac {(1+x)^{11}}{x^{15}} \, dx\\ &=-\frac {(1+x)^{12}}{16 x^{16}}+\frac {(1+x)^{12}}{60 x^{15}}-\frac {(1+x)^{12}}{280 x^{14}}-\frac {1}{140} \int \frac {(1+x)^{11}}{x^{14}} \, dx\\ &=-\frac {(1+x)^{12}}{16 x^{16}}+\frac {(1+x)^{12}}{60 x^{15}}-\frac {(1+x)^{12}}{280 x^{14}}+\frac {(1+x)^{12}}{1820 x^{13}}+\frac {\int \frac {(1+x)^{11}}{x^{13}} \, dx}{1820}\\ &=-\frac {(1+x)^{12}}{16 x^{16}}+\frac {(1+x)^{12}}{60 x^{15}}-\frac {(1+x)^{12}}{280 x^{14}}+\frac {(1+x)^{12}}{1820 x^{13}}-\frac {(1+x)^{12}}{21840 x^{12}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.00, size = 83, normalized size = 1.36 \begin {gather*} -\frac {1}{16 x^{16}}-\frac {11}{15 x^{15}}-\frac {55}{14 x^{14}}-\frac {165}{13 x^{13}}-\frac {55}{2 x^{12}}-\frac {42}{x^{11}}-\frac {231}{5 x^{10}}-\frac {110}{3 x^9}-\frac {165}{8 x^8}-\frac {55}{7 x^7}-\frac {11}{6 x^6}-\frac {1}{5 x^5} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[((1 + x)*(1 + 2*x + x^2)^5)/x^17,x]

[Out]

-1/16*1/x^16 - 11/(15*x^15) - 55/(14*x^14) - 165/(13*x^13) - 55/(2*x^12) - 42/x^11 - 231/(5*x^10) - 110/(3*x^9
) - 165/(8*x^8) - 55/(7*x^7) - 11/(6*x^6) - 1/(5*x^5)

________________________________________________________________________________________

IntegrateAlgebraic [F]  time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \frac {(1+x) \left (1+2 x+x^2\right )^5}{x^{17}} \, dx \end {gather*}

Verification is not applicable to the result.

[In]

IntegrateAlgebraic[((1 + x)*(1 + 2*x + x^2)^5)/x^17,x]

[Out]

IntegrateAlgebraic[((1 + x)*(1 + 2*x + x^2)^5)/x^17, x]

________________________________________________________________________________________

fricas [A]  time = 0.40, size = 60, normalized size = 0.98 \begin {gather*} -\frac {4368 \, x^{11} + 40040 \, x^{10} + 171600 \, x^{9} + 450450 \, x^{8} + 800800 \, x^{7} + 1009008 \, x^{6} + 917280 \, x^{5} + 600600 \, x^{4} + 277200 \, x^{3} + 85800 \, x^{2} + 16016 \, x + 1365}{21840 \, x^{16}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+x)*(x^2+2*x+1)^5/x^17,x, algorithm="fricas")

[Out]

-1/21840*(4368*x^11 + 40040*x^10 + 171600*x^9 + 450450*x^8 + 800800*x^7 + 1009008*x^6 + 917280*x^5 + 600600*x^
4 + 277200*x^3 + 85800*x^2 + 16016*x + 1365)/x^16

________________________________________________________________________________________

giac [A]  time = 0.15, size = 60, normalized size = 0.98 \begin {gather*} -\frac {4368 \, x^{11} + 40040 \, x^{10} + 171600 \, x^{9} + 450450 \, x^{8} + 800800 \, x^{7} + 1009008 \, x^{6} + 917280 \, x^{5} + 600600 \, x^{4} + 277200 \, x^{3} + 85800 \, x^{2} + 16016 \, x + 1365}{21840 \, x^{16}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+x)*(x^2+2*x+1)^5/x^17,x, algorithm="giac")

[Out]

-1/21840*(4368*x^11 + 40040*x^10 + 171600*x^9 + 450450*x^8 + 800800*x^7 + 1009008*x^6 + 917280*x^5 + 600600*x^
4 + 277200*x^3 + 85800*x^2 + 16016*x + 1365)/x^16

________________________________________________________________________________________

maple [A]  time = 0.05, size = 62, normalized size = 1.02 \begin {gather*} -\frac {1}{5 x^{5}}-\frac {11}{6 x^{6}}-\frac {55}{7 x^{7}}-\frac {165}{8 x^{8}}-\frac {110}{3 x^{9}}-\frac {231}{5 x^{10}}-\frac {42}{x^{11}}-\frac {55}{2 x^{12}}-\frac {165}{13 x^{13}}-\frac {55}{14 x^{14}}-\frac {11}{15 x^{15}}-\frac {1}{16 x^{16}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((x+1)*(x^2+2*x+1)^5/x^17,x)

[Out]

-1/5/x^5-165/8/x^8-231/5/x^10-55/14/x^14-11/15/x^15-110/3/x^9-55/7/x^7-55/2/x^12-11/6/x^6-165/13/x^13-1/16/x^1
6-42/x^11

________________________________________________________________________________________

maxima [A]  time = 0.58, size = 60, normalized size = 0.98 \begin {gather*} -\frac {4368 \, x^{11} + 40040 \, x^{10} + 171600 \, x^{9} + 450450 \, x^{8} + 800800 \, x^{7} + 1009008 \, x^{6} + 917280 \, x^{5} + 600600 \, x^{4} + 277200 \, x^{3} + 85800 \, x^{2} + 16016 \, x + 1365}{21840 \, x^{16}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+x)*(x^2+2*x+1)^5/x^17,x, algorithm="maxima")

[Out]

-1/21840*(4368*x^11 + 40040*x^10 + 171600*x^9 + 450450*x^8 + 800800*x^7 + 1009008*x^6 + 917280*x^5 + 600600*x^
4 + 277200*x^3 + 85800*x^2 + 16016*x + 1365)/x^16

________________________________________________________________________________________

mupad [B]  time = 1.05, size = 60, normalized size = 0.98 \begin {gather*} -\frac {\frac {x^{11}}{5}+\frac {11\,x^{10}}{6}+\frac {55\,x^9}{7}+\frac {165\,x^8}{8}+\frac {110\,x^7}{3}+\frac {231\,x^6}{5}+42\,x^5+\frac {55\,x^4}{2}+\frac {165\,x^3}{13}+\frac {55\,x^2}{14}+\frac {11\,x}{15}+\frac {1}{16}}{x^{16}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(((x + 1)*(2*x + x^2 + 1)^5)/x^17,x)

[Out]

-((11*x)/15 + (55*x^2)/14 + (165*x^3)/13 + (55*x^4)/2 + 42*x^5 + (231*x^6)/5 + (110*x^7)/3 + (165*x^8)/8 + (55
*x^9)/7 + (11*x^10)/6 + x^11/5 + 1/16)/x^16

________________________________________________________________________________________

sympy [A]  time = 0.19, size = 61, normalized size = 1.00 \begin {gather*} \frac {- 4368 x^{11} - 40040 x^{10} - 171600 x^{9} - 450450 x^{8} - 800800 x^{7} - 1009008 x^{6} - 917280 x^{5} - 600600 x^{4} - 277200 x^{3} - 85800 x^{2} - 16016 x - 1365}{21840 x^{16}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+x)*(x**2+2*x+1)**5/x**17,x)

[Out]

(-4368*x**11 - 40040*x**10 - 171600*x**9 - 450450*x**8 - 800800*x**7 - 1009008*x**6 - 917280*x**5 - 600600*x**
4 - 277200*x**3 - 85800*x**2 - 16016*x - 1365)/(21840*x**16)

________________________________________________________________________________________